home *** CD-ROM | disk | FTP | other *** search
/ ShareWare OnLine 2 / ShareWare OnLine Volume 2 (CMS Software)(1993).iso / database / freqanal.zip / FREQANAL.PRG < prev   
Text File  |  1993-02-14  |  921b  |  25 lines
  1. /**********************************************************************/
  2. /*  File:     FreqAnal.prg                                            */
  3. /*  Author:   Jon Derman                                              */
  4. /*  Date:     February 14, 1993                                       */
  5. /*  Dialect:  Clipper 5.01                                            */
  6. /*  Syntax:   FreqAnal                                                */
  7. /*  Compile:  Clipper FreqAnal /n/w/m                                 */
  8. /*  Link:     Blinker fi FreqAnal lib super30                         */
  9. /*  Comments: FreqAnal() & PopupDir() from SuperLib 3.0               */
  10. /**********************************************************************/
  11.  
  12. PROCEDURE Main
  13.   LOCAL cDbf
  14.  
  15.   CLEAR SCREEN
  16.   InitSup()
  17.   cDbf := PopupDir("*.dbf")
  18.   IF ! empty(cDbf)
  19.     USE (cDbf)
  20.     FreqAnal()
  21.     CLOSE (cDbf)
  22.   ENDIF
  23.  
  24. RETURN
  25.